package com.jianzh5.action.web;

import com.jianzh5.action.BaseAction;
import org.springframework.stereotype.Controller;
import org.springframework.web.bind.annotation.RequestMapping;
import org.springframework.web.bind.annotation.ResponseBody;
import org.springframework.web.multipart.MultipartFile;
import org.springframework.web.multipart.MultipartHttpServletRequest;
import org.springframework.web.multipart.commons.CommonsMultipartResolver;

import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import java.io.File;
import java.io.IOException;
import java.text.SimpleDateFormat;
import java.util.*;

/**
 * Created by jianzh5 on 2015/7/14.
 * Kindeditor配置类
 */
@Controller
@RequestMapping("/kind/file")
public class KindeAction extends BaseAction{

    @RequestMapping(value = "/upload" ,produces="text/plain;charset=UTF-8")
    @ResponseBody
    public String uploadFile(HttpServletRequest request,HttpServletResponse response){
        //文件保存目录路径
        String savePath ="/files/attached";
        //文件保存目录URL
        String saveUrl  ="/files/attached";
        //定义允许上传的文件扩展名
        HashMap<String, String> extMap = new HashMap<String, String>();
        extMap.put("image", "gif,jpg,jpeg,png,bmp");
        extMap.put("flash", "swf,flv");
        extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
        extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2");
        response.setContentType("text/html; charset=UTF-8");
        String dirName = request.getParameter("dir");
        if (dirName == null) {
            dirName = "image";
        }
        if(!extMap.containsKey(dirName)){
            return getError("目录名不正确。");
        }
        savePath += "/"+dirName;
        saveUrl += "/"+dirName;
        SimpleDateFormat sdf = new SimpleDateFormat("yyyyMMdd");
        String ymd = sdf.format(new Date());
        savePath += "/"+ymd;
        saveUrl += "/"+ymd;
        //文件保存目录路径
        savePath = request.getSession().getServletContext().getRealPath(savePath);
        //文件保存目录URL
        saveUrl  = request.getContextPath() + saveUrl;
        //检查目录
        File uploadDir = new File(savePath);
        if(!uploadDir.exists()){
            if(!uploadDir.mkdirs()){
                return getError("上传目录不存在。");
            }
        }
        //检查目录写权限
        if(!uploadDir.canWrite()){
            return getError("上传目录没有写权限。");
        }
        CommonsMultipartResolver multipartResolver = new CommonsMultipartResolver(request.getSession().getServletContext());
        // 判断 request 是否有文件上传,即多部分请求
        if (multipartResolver.isMultipart(request)) {
            MultipartHttpServletRequest multipartHttpServletRequest=(MultipartHttpServletRequest)request;
            Iterator<String> fileNames = multipartHttpServletRequest.getFileNames();
            MultipartFile multipartFile=null;
            while (fileNames.hasNext()) {
                multipartFile =multipartHttpServletRequest.getFile(fileNames.next());
                String originalFilename = multipartFile.getOriginalFilename();
                String suffix = originalFilename.substring(originalFilename
                        .lastIndexOf(".") + 1);
                if(!Arrays.<String>asList(extMap.get(dirName).split(",")).contains(suffix)){
                    return getError("上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。");
                }
                SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");
                String newFileName = df.format(new Date()) + "_" + new Random().nextInt(1000) + "." + suffix;
                try {
                    multipartFile.transferTo(new File(savePath+"\\"+newFileName));
                } catch (IllegalStateException e) {
                    return getError(e.getMessage());
                    // return getError("上传文件失败。");
                } catch (IOException e) {
                    return getError(e.getMessage());
                    //	return getError("上传文件失败。");
                }

                Map<String,Object> map = new HashMap<String,Object>();
                map.put("error",0);
                map.put("url", saveUrl +"/"+ newFileName);
                return getJson(map);
            }
        }
        return getError("没有文件存在");
    }

    private String getError(String message) {
        Map<String,Object> map = new HashMap<String,Object>();
        map.put("error", 1);
        map.put("message", message);
        String jsonString= getJson(map);
        logger.info("jsonString:"+jsonString);
        return jsonString;
    }

    @RequestMapping(value = "/manager",produces = "text/plain;charset=UTF-8")
    @ResponseBody
    public String ManageFile(HttpServletRequest request,HttpServletResponse response){
        response.setContentType("application/json; charset=UTF-8");
        //根目录路径，可以指定绝对路径，比如 /var/www/attached/
        String rootPath = request.getSession().getServletContext().getRealPath("/")+"/files/attached/";
        String rootUrl = request.getContextPath() + "/files/attached/";
        logger.info("rootPath:"+rootPath);
        //图片扩展名
        String[] fileTypes = new String[]{"gif", "jpg", "jpeg", "png", "bmp"};
        String dirName = request.getParameter("dir");
        if(dirName != null){
            if(!Arrays.<String>asList(new String[]{"image", "flash", "media", "file"}).contains(dirName)){
                return "Invalid Directory name.";
            }
            rootPath += dirName + "/";
            rootUrl += dirName + "/";
            File saveDirFile = new File(rootPath);
            if (!saveDirFile.exists()) {
                saveDirFile.mkdirs();
            }
        }
        //根据path参数，设置各路径和URL
        String path = request.getParameter("path") != null ? request.getParameter("path") : "";
        logger.info("path:"+path);
        String currentPath = rootPath + path;
        String currentUrl = rootUrl + path;
        String currentDirPath = path;
        String moveupDirPath = "";
        if (!"".equals(path)) {
            String str = currentDirPath.substring(0, currentDirPath.length() - 1);
            moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0, str.lastIndexOf("/") + 1) : "";
        }
        //排序形式，name or size or type
        String order = request.getParameter("order") != null ? request.getParameter("order").toLowerCase() : "name";

        //不允许使用..移动到上一级目录
        if (path.indexOf("..") >= 0) {
            return "Access is not allowed.";
        }
        //最后一个字符不是/
        if (!"".equals(path) && !path.endsWith("/")) {
            return "Parameter is not valid.";
        }
        //目录不存在或不是目录
        File currentPathFile = new File(currentPath);
        if(!currentPathFile.isDirectory()){
            return "Directory does not exist.";
        }
        //遍历目录取的文件信息
        List<Hashtable<String,Object>> fileList = new ArrayList<Hashtable<String,Object>>();
        if(currentPathFile.listFiles() != null) {
            for (File file : currentPathFile.listFiles()) {
                Hashtable<String, Object> hash = new Hashtable<String, Object>();
                String fileName = file.getName();
                if(file.isDirectory()) {
                    hash.put("is_dir", true);
                    hash.put("has_file", (file.listFiles() != null));
                    hash.put("filesize", 0L);
                    hash.put("is_photo", false);
                    hash.put("filetype", "");
                } else if(file.isFile()){
                    String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
                    hash.put("is_dir", false);
                    hash.put("has_file", false);
                    hash.put("filesize", file.length());
                    hash.put("is_photo", Arrays.<String>asList(fileTypes).contains(fileExt));
                    hash.put("filetype", fileExt);
                }
                hash.put("filename", fileName);
                hash.put("datetime", new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file.lastModified()));
                fileList.add(hash);
            }
        }

        if ("size".equals(order)) {
            Collections.sort(fileList, new SizeComparator());
        } else if ("type".equals(order)) {
            Collections.sort(fileList, new TypeComparator());
        } else {
            Collections.sort(fileList, new NameComparator());
        }
        Map<String,Object> result = new HashMap<String,Object>();
        result.put("moveup_dir_path", moveupDirPath);
        result.put("current_dir_path", currentDirPath);
        result.put("current_url", currentUrl);
        result.put("total_count", fileList.size());
        result.put("file_list", fileList);

        response.setContentType("application/json; charset=UTF-8");
        return getJson(result);
    }

    public class SizeComparator implements Comparator{
        @Override
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable)a;
            Hashtable hashB = (Hashtable)b;
            if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
                return 1;
            } else {
                if (((Long)hashA.get("filesize")) > ((Long)hashB.get("filesize"))) {
                    return 1;
                } else if (((Long)hashA.get("filesize")) < ((Long)hashB.get("filesize"))) {
                    return -1;
                } else {
                    return 0;
                }
            }
        }
    }

    public class TypeComparator implements Comparator{

        @Override
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable)a;
            Hashtable hashB = (Hashtable)b;
            if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String)hashA.get("filetype")).compareTo((String)hashB.get("filetype"));
            }
        }
    }

    public class NameComparator implements Comparator{
        @Override
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable)a;
            Hashtable hashB = (Hashtable)b;
            if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
                return -1;
            } else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
                return 1;
            } else {
                return ((String)hashA.get("filename")).compareTo((String)hashB.get("filename"));
            }
        }
    }

}
